home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 2010 April / PCWorld0410.iso / redakcyjne / programy / VideoLAN Client (VLC) 1.0.5 / vlc-1.0.5-win32.exe / lua / playlist / mpora.lua < prev    next >
Text File  |  2010-01-30  |  2KB  |  53 lines
  1. --[[
  2.  $Id$
  3.  
  4.  Copyright ┬⌐ 2009 the VideoLAN team
  5.  
  6.  Authors: Konstantin Pavlov (thresh@videolan.org)
  7.  
  8.  This program is free software; you can redistribute it and/or modify
  9.  it under the terms of the GNU General Public License as published by
  10.  the Free Software Foundation; either version 2 of the License, or
  11.  (at your option) any later version.
  12.  
  13.  This program is distributed in the hope that it will be useful,
  14.  but WITHOUT ANY WARRANTY; without even the implied warranty of
  15.  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16.  GNU General Public License for more details.
  17.  
  18.  You should have received a copy of the GNU General Public License
  19.  along with this program; if not, write to the Free Software
  20.  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  21. --]]
  22.  
  23. -- Probe function.
  24. function probe()
  25.     return vlc.access == "http"
  26.         and string.match( vlc.path, "video.mpora.com/watch/" )
  27. end
  28.  
  29. -- Parse function.
  30. function parse()
  31.     p = {}
  32.     while true do
  33.         -- Try to find the video's title
  34.         line = vlc.readline()
  35.         if not line then break end
  36.         if string.match( line, "meta name=\"title\"" ) then
  37.             _,_,name = string.find( line, "content=\"(.*)\" />" )
  38.         end
  39.         if string.match( line, "image_src" ) then
  40.             _,_,arturl = string.find( line, "image_src\" href=\"(.*)\" />" )
  41.         end
  42.  
  43.         if string.match( line, "filmID" ) then
  44.             _,_,video = string.find( line, "var filmID = \'(.*)\';")
  45.             table.insert( p, { path = "http://cdn0.mpora.com/play/video/"..video.."/mp4/"; name = name; arturl = arturl } )
  46.         end
  47.         if string.match( line, "definitionLink hd" ) then
  48.             table.insert( p, { path = "http://cdn0.mpora.com/play/video/"..video.."_hd/mp4/"; name = name.." (HD)", arturl = arturl } )
  49.         end
  50.     end
  51.     return p
  52. end
  53.